;; Notice how the operator is not a simply defined function, but a
;; compound expression that is evaluated in order to decide which
;; function should be applied, "+" or "-".
(define (a-plus-abs-b a b)
   ((if (> b 0) + -) a b))